inherited FPesquisaMaladiretaCliente: TFPesquisaMaladiretaCliente
  Left = 243
  Caption = 'Pesquisa Mala direta Cliente'
  ClientHeight = 298
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    inherited BtnLimpar: TBitBtn
      OnClick = BtnLimparClick
    end
    inherited BtnImprimir: TBitBtn
      OnClick = BtnImprimirClick
    end
    inherited BtnSelecionar: TBitBtn
      Enabled = False
    end
  end
  inherited Panel1: TPanel
    Height = 257
    object Label25: TLabel [0]
      Left = 2
      Top = 42
      Width = 29
      Height = 13
      Caption = 'Grupo'
    end
    object Label26: TLabel [1]
      Left = 87
      Top = 42
      Width = 20
      Height = 13
      Caption = 'M'#234's'
    end
    object Label27: TLabel [2]
      Left = 177
      Top = 44
      Width = 28
      Height = 13
      Caption = 'Nome'
    end
    object Label1: TLabel [3]
      Left = 2
      Top = 84
      Width = 32
      Height = 13
      Caption = 'Cliente'
    end
    object Label2: TLabel [4]
      Left = 37
      Top = 42
      Width = 16
      Height = 13
      Caption = 'Dia'
    end
    object Label22: TLabel [5]
      Left = 288
      Top = 84
      Width = 42
      Height = 13
      Caption = 'Situa'#231#227'o'
    end
    inherited DBGrid1: TDBGrid
      Top = 131
      TabOrder = 6
    end
    inherited Panel3: TPanel
      Top = 236
      TabOrder = 7
    end
    object EGrupo: TEdit
      Left = 2
      Top = 58
      Width = 30
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 1
      TabOrder = 1
    end
    object ENome: TEdit
      Left = 177
      Top = 58
      Width = 230
      Height = 21
      CharCase = ecUpperCase
      MaxLength = 60
      TabOrder = 4
    end
    object DBLCBCliente: TDBLookupComboBox
      Left = 2
      Top = 100
      Width = 281
      Height = 21
      KeyField = 'CLI_CODIGO'
      ListField = 'CLI_RAZAO'
      ListSource = DSCliente
      TabOrder = 5
      OnKeyDown = DBLCBClienteKeyDown
    end
    object CBMes: TComboBox
      Left = 87
      Top = 58
      Width = 88
      Height = 21
      CharCase = ecUpperCase
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Items.Strings = (
        ''
        'JANEIRO'
        'FEVEREIRO'
        'MAR'#199'O'
        'ABRIL'
        'MAIO'
        'JUNHO'
        'JULHO'
        'AGOSTO'
        'SETEMBRO'
        'OUTUBRO'
        'NOVEMBRO'
        'DEZEMBRO')
    end
    object CBDia: TComboBox
      Left = 37
      Top = 58
      Width = 48
      Height = 21
      CharCase = ecUpperCase
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      OnKeyPress = CBDiaKeyPress
      Items.Strings = (
        ''
        '01'
        '02'
        '03'
        '04'
        '05'
        '06'
        '07'
        '08'
        '09'
        '10'
        '11'
        '12'
        '13'
        '14'
        '15'
        '16'
        '17'
        '18'
        '19'
        '20'
        '21'
        '22'
        '23'
        '24'
        '25'
        '26'
        '27'
        '28'
        '29'
        '30'
        '31')
    end
    object RGSelecao: TRadioGroup
      Left = 3
      Top = 1
      Width = 166
      Height = 37
      Caption = 'Etiqueta'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Cliente'
        'Mala Direta')
      TabOrder = 0
    end
    object CBSituacao: TComboBox
      Left = 288
      Top = 100
      Width = 119
      Height = 21
      ItemHeight = 13
      TabOrder = 8
      Items.Strings = (
        'Ativo'
        'Inativo')
    end
    object rgModelo: TRadioGroup
      Left = 176
      Top = 1
      Width = 225
      Height = 37
      Caption = 'Modelo'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        'Duas Colunas'
        'Tr'#234's Colunas')
      TabOrder = 9
    end
  end
  inherited QPesquisa: TQuery
    Active = True
    SQL.Strings = (
      
        'Select CLI_RAZAO as RazaoSocial,CLI_ENDERECOCORRESP as EnderecoR' +
        'esp,CLI_BAIRROCORRESP as BairroResp,'
      
        'CLI_CEPCORRESP as CepResp,CLI_CIDADECORRESP as CidadeResp,CLI_ES' +
        'TADOCORRESP as UfResp,'
      
        'CLI_ENDERECOPEDIDO as EnderecoPedi,CLI_BAIRROPEDIDO as BairroPed' +
        'i,CLI_CEPPEDIDO as CepPedi,CLI_CIDADEPEDIDO as CidadePedi,CLI_ES' +
        'TADOPEDIDO as UfPedi,CLI_IDENTENDCORRESP as TipoEndereco'
      'From CLIENTE')
    Left = 184
    Top = 209
  end
  inherited DSPesquisa: TDataSource
    Left = 224
    Top = 209
  end
  object DSCliente: TDataSource
    DataSet = DMGestao.QCliente
    Left = 144
    Top = 128
  end
end
